home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Inventor Labs: Transportation
/
InventorLabs - Transportation.iso
/
mac
/
Builders
/
media
/
netacess
/
hminet.dir
/
00030_Script_30
< prev
next >
Wrap
Text File
|
1997-04-04
|
777b
|
35 lines
on exitFrame
global WebBrowser, softCancel
--
-- test to see if AOL is registered
-- if it is, launch AOL
-- otherwise, give the user a choice...
--
if the machineType = 256 then
set AOLRegStat = WebBrowser(mIsAOLRegistered)
else
set AOLRegStat = Browser( "AOLRegistered" )
--
-- Note that returns for Mac and Windows are reversed
-- for this function
if AOLRegStat <> 0 then
set AOLRegStat = 0
else
set AOLRegStat = 1
end if
end if
if AOLRegStat <> 0 then
-- AOL is registered
set the text of cast "Status" to "AOL is not registered"
go "AOLLaunch"
else
set the text of cast "Status" to "AOL is registered"
go "AOLLaunch"
end if
end